home *** CD-ROM | disk | FTP | other *** search
/ SVM Mac 133 / CD-ROM N°133 - Le CD-ROM des CD-ROM.iso / PARTCOM / SVMFOR / SOMM.DIR / 00002.ls < prev    next >
Encoding:
Text File  |  1995-11-09  |  449 b   |  25 lines
  1. on mouseDown
  2.   puppetSprite(3, 1)
  3.   repeat while the stillDown
  4.     if rollOver(3) then
  5.       set the castNum of sprite 3 to 22
  6.       updateStage()
  7.       next repeat
  8.     end if
  9.     set the castNum of sprite 3 to 2
  10.     updateStage()
  11.   end repeat
  12.   puppetSprite(3, 0)
  13. end
  14.  
  15. on mouseUp
  16.   if rollOver(3) then
  17.     set the mouseDownScript to "dontPassEvent"
  18.     if the frame = 4 then
  19.       go("Mmd")
  20.     else
  21.       go(the frame - 6)
  22.     end if
  23.   end if
  24. end
  25.